VB中的"命令行参数"怎么用?

给你做个简单的介绍吧，先做下面的
'添加窗体Form1,然后添加如下代码:
Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long
Private Sub Form_Load()
    Select Case Left(Command, 2)
            Case "/o" '表示open，打开光驱
                mciSendString "Set CDAudio Door Open Wait", 0&, 0&, 0&
            Case "/c" '表示close，关闭光驱
   &